home *** CD-ROM | disk | FTP | other *** search
/ CinE CD 6 / CinE CD ROM 06.iso / pc / playqt.dir / 00014_Script_keydown_handler < prev   
Text File  |  1996-06-21  |  673b  |  26 lines
  1. on keyDown_handler
  2.   global  gsoundlevel
  3.   
  4.   if the key = "-" then
  5.     set gsoundFlag = 1 - gsoundFlag
  6.     set the soundenabled to not (the soundenabled)
  7.   else
  8.     if "01234567" contains the key then
  9.       set gsoundLevel = value (the key)
  10.       set the soundLevel = gsoundlevel
  11.       
  12. --      set the volume of sprite 1 = gsoundlevel * 32
  13.       
  14.       
  15. --      tell the stage to set the castnum of sprite 17 = the number of cast "V0.PIC" + the soundLevel
  16.       updatestage
  17.       
  18. --      starttimer
  19. --      repeat while the timer < 15
  20.         ---wait for counter
  21. --      end repeat
  22.       
  23.     end if
  24.   end if
  25.   dontpassevent
  26. end keyDown_handler